COMMENT ⊗   VALID 00004 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	.<<	TWO COLUMN FORMAT	by L. Earnest		February 1975
C00004 00003	.device XGP
C00006 00004	.portion some place text
C00012 ENDMK
C⊗;
.<<	TWO COLUMN FORMAT	by L. Earnest		February 1975
.		
.			Sections
.Begin each segment with the appropriate one of the following macros
.S <section name>
.SS <subsection name>
.SSS <subsubsection name>
.APP <appendix name>
.If the name is more than one line long, enclose it in vertical bars ("|").
.
.If you wish to use a subtitle in the text but you do not want it to
.appear in the Table of Contents, you can use the following macro to
.make it centered in boldface:
. CB <subtitle>
.
.Another handy macro is FAC which has been defined as "FILL ADJUST COMPACT",
.(i.e. normal justify mode).
.
.There are some other macros whose use you can probably deduce from context
.or from their definitions below.
.>>
.device XGP;
.require "basker.pub[sub,sys]" source_file;
.sides←1;
.require "twocol.pub[sub,sys]" source_file;

.MACRO YON(LBL)  ⊂ "Section "; SUB2! LBL ⊃;

.font 5 "fix20";
.COMMENT leave space for a full page figure;
.MACRO FIG(NAME) ⊂ SKIP TO COLUMN 1
.GROUP SKIP 20
NAME
.next page; ⊃

.MACRO BC ⊂ BEGIN PREFACE 0; INDENT 1,4; CRBREAK nojust ⊃

.MACRO BS ⊂ BEGIN PREFACE 0; INDENT 1,4; nojust ⊃

.MACRO SUB(IND) ⊂ INDENT 0,IND; TABS IND+1;⊃

.MACRO IB ⊂ turn on "%";
.AT """" ⊂ (IF THISFONT=1 THEN "%3" ELSE "%1"); ⊃
.AT "<" ⊂ "%2" ⊃;  AT ">" ⊂ "%1" ⊃;
. ⊃

.MACRO BI ⊂ BEGIN IB ⊃;
.MACRO OI ⊂ ONCE IB ⊃;

.MACRO BIB  ⊂  CB(References);
.	BEGIN INDENT 0,3; NOJUST; IB;
.	AT "AIM-" ⊂ "Stanford A. I. Memo AαIαMα-" ⊃;
.	COUNT exref TO 200
.	AT "⊗" ⊂ IF LINES<3 THEN NEXT COLUMN; NEXT EXREF; ("["&EXREF&"]  ") ⊃
.	⊃

.MACRO ITEMS;	⊂
.nojust; count item; count subitem in item printing "a";
.at "⊗⊗";	⊂ next subitem; indent 2,4; subitem!}.  { ⊃
.at "⊗";	⊂ next item; indent 0,2; item!}.  { ⊃
.⊃
.
.at "\\pers";	⊂ once nojust; indent 0,5; ("%3Personnel: %1"); ⊃;
.
.MACRO GET(FILE) ⊂ BEGIN "FILE"
.REQUIRE "FILE" SOURCE;
.END "FILE"
. ⊃

.SECNAME←"";
.portion some; place text;